From: Kenichi Handa <handa@m17n.org>
Date: Fri, 17 Apr 2009 02:14:50 +0000 (+0000)
Subject: (Ftranslate_region_internal): Use Fconcat to make a
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~809
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=7bb2f3f96edfd34a09281428d05f0bd809baeb9c;p=emacs.git

(Ftranslate_region_internal): Use Fconcat to make a
string from a vector to handle Latin-1 characters correctly.
---

diff --git a/src/editfns.c b/src/editfns.c
index 9d6ff9be655..d573eef5afc 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -3147,12 +3147,7 @@ It returns the number of characters changed.  */)
 
 	      if (VECTORP (val))
 		{
-		  int i;
-
-		  string = Fmake_string (make_number (ASIZE (val)),
-					 AREF (val, 0));
-		  for (i = 1; i < ASIZE (val); i++)
-		    Faset (string, make_number (i), AREF (val, i));
+		  string = Fconcat (1, &val);
 		}
 	      else
 		{